home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / COMM / BBS / RISCBBS / !RiscBBS / Menus / Filebase / LocZipNew < prev    next >
Text File  |  1992-02-24  |  1KB  |  76 lines
  1. {
  2.  report `Files local newscan`
  3.  
  4.  defopt F= `Forward` 10 ``
  5.    f_list `1 L N`
  6.    if RET
  7.      menu Filebase.Main
  8.    endif
  9.  endopt
  10.  
  11.  defopt B= `Backward` 10 ``
  12.    f_list `-1 L N`
  13.    if RET
  14.      menu Filebase.Main
  15.    endif
  16.  endopt
  17.  
  18.  defopt C= `Current` 10 ``
  19.    f_list `0 L N`
  20.    if RET
  21.      menu Filebase.Main
  22.    endif
  23.  endopt
  24.  
  25.  defopt D= `Download` 10 ``
  26.    pushmenu
  27.    menu Filebase.DownLoadS
  28.  endopt
  29.  
  30.  defopt Q= `Queue` 10 ``
  31.    f_queue
  32.  endopt
  33.  
  34.  defopt K= `Kill file` 10 ``
  35.    f_kill
  36.  endopt
  37.  
  38.  defopt V= `View archive` 10 ``
  39.    pushmenu
  40.    menu Filebase.ViewArcS
  41.  endopt
  42.  
  43.  defopt T= `Type file` 10 ``
  44.    f_type
  45.  endopt
  46.  
  47.  defopt S= `Start of area` 10 ``
  48.    f_list `1 RB L N`
  49.    if RET
  50.      menu Filebase.Main
  51.    endif
  52.  endopt
  53.  
  54.  defopt E= `End of area` 10 ``
  55.    f_list `-1 RE L N`
  56.    if RET
  57.      menu Filebase.Main
  58.    endif
  59.  endopt
  60.  
  61.  defopt ¤= `Next` 10 ``
  62.    f_list `0 I L N`
  63.    if RET
  64.      menu Filebase.Main
  65.    endif
  66.  endopt
  67.  
  68.  defopt A= `Abort` 10 ``
  69.    menu Filebase.Main
  70.  endopt
  71.  
  72.  attr 0 6
  73. }
  74. Newscan: {fg 7}[{fg 1}F{fg 7}]orward  [{fg 1}B{fg 7}]ackward  [{fg 1}C{fg 7}]urrent  [{fg 1}V{fg 7}]iew  [{fg 1}T{fg 7}]ype  [{fg 1}K{fg 7}]ill
  75.          {fg 7}[{fg 1}D{fg 7}]ownload  [{fg 1}S{fg 7}]tart of area  [{fg 1}E{fg 7}]nd of area  [{fg 1}A{fg 7}]bort : {fg 1 eof}
  76.